



   

   -










                    

       
                     

                              -    

                          

                 







                            92

























                              1984
  ..
                                                        
 

                             - 2 -








                           




   1.                                                4


   2.                                    6


   3.   '                               7

   3.1.     GSD                                         10
   3.1.1.      '  (=0)        11
   3.1.2.               
             (=1)                                       12
   3.1.3.               
              (=2)                              13
   3.1.4.        (=3)         14
   3.1.5.              
             (=4)                                       15
   3.1.6.               
             (=5)                                       16
   3.1.7.       (=6)        18
   3.1.8.    '   (=7)        19
   3.2.     ENDGSD                                      20
   3.3.     TXT                                         20
   3.4.     RLD                                         21
   3.4.1.                              23
   3.4.2.                              23
   3.4.3.                     24
   3.4.4.                     24
   3.4.5.                       25
   3.4.6.           
                                                    25
   3.4.7.               26
   3.4.8.                         26
   3.4.9.                           27
   3.4.10.                         27
   3.4.11.           
                                                      28
   3.4.12.               29
   3.4.13.            
                                           29
   3.4.14.                                   30
   3.5.     ENDMOD                                      32

   4.    STB                                     33


   5.                               34

   5.1.                             36
   5.2.     '                    38
 

                             - 3 -




   5.3.                           39

   6.    LDA                                     40


   7.    SAV                                     42


   8.    REL                                     44

   8.1.                     45
   8.2.                       46

   9.                          49


   10.                     51


   11.                     55

   11.1.                               56
   11.2.                                       58
   11.2.1.                   58
   11.2.2.                       59
   11.2.2.1.                             60
   11.2.2.2.                                    61
   11.2.2.3.                                      61
   11.2.2.4.   ()              61
   11.2.2.5.                                            62
   11.2.2.6.                             63
   11.3.      , 
                                                  63
   11.4.                 65
   11.4.1.               
                           67
   11.4.1.1.   1                            67
   11.4.1.2.              68
   11.4.1.3.        ,   
                                    70
   11.4.1.4.              
                                           70
   11.5.                   71
   11.6.                           73
   11.7.                        76
   11.7.1.            
             RM/SJ/FB/XM-                          77
   11.7.1.1.            77
   11.7.1.2.     
                                                    78
   11.7.2.            
             TS-                                    81

   12.           83

   12.1.                     83
   12.2.                            87


 

                             - 4 -




                          1. 




            :

          - ;
          -  ;
          -  .

         ,        
      ,    -
   .

              '  ,
      .

          '    (-
    LINK)       
    .        -
   .

              (. 1):

          -  ( MAC, FOR, DAT, BAS  .);  -
                 ;

          - ' ( OBJ);      
              ; '    
                 '  -
            ; '       '  
                   COPY    
            /CONCATENATE;    '
               ,      -
               (LIBR);

          -       (  SAV,  REL,  LDA);  
            ' ,     LINK;
                  '      
            -" " (SAV)      ,
               (REL)    -
            ,            
            (LDA);     ,    
               LINK.














 

                             - 5 -




                  


                           

        !-------!           !-------!           !-------!
        ! *.MAC !           ! *.FOR !           ! *.XXX !
        !-------!           !-------!           !-------!
            !                   !                   !
            !                   !                   !
            Y                   Y                   Y
    !----------------!    !------------!    !---------------!
    !                !    !  !    !  ,  !
    !  !    !            !    !     !
    !                !    !     !    !  !
    !----------------!    !------------!    !---------------!
            !                   !                   !
            !         ' !  ()    !
            Y                   Y                   Y
        !-------!           !-------!           !-------!
        ! *.OBJ !           ! *.OBJ !           ! *.OBJ !
        !-------!           !-------!           !-------!
            !                   !                   !
            Y                   Y                   Y
            !-------------------!-------------------!
                           !                     !
                           !                     !
                           !                     Y
                           !                !---------------!
                           !   !-------!    !               !
                           !   ! *.OBJ !<---!   !
                           !   !-------!    !               !
            !----------!   !       !        !---------------!
            !          !   !       !
            !          Y   Y       Y
            !        !---------------!
        !-------!    !               !
        ! *.STB !<---!    !
        !-------!    !               !
                     !---------------!
                         !   !   !
                 !-------!   !   !-------!
                 !           !           !
                 Y           Y           Y
             !-------!   !-------!   !-------!  
             ! *.SAV !   ! *.REL !   ! *.LDA !   
             !-------!   !-------!   !-------!  



                             . 1








 

                             - 6 -




                   2.   




           ,      -
     ,      ,  
   ,         
   -7.     ,  -
         -7.

             "", -
               <FF>
   ( ).       ,
         -
     <CR><LF>.         -
           -
     .

         32 ( <CTRL/Z>)     .
       PIP    /A (  
      COPY/ASCII)    
    ,       -
             <CTRL/Z>.
       <CTRL/Z>,  PIP  ,    
    .  PIP    "  "
   (    COPY  )  -
       ,           
   <CTRL/Z>.      -
     .





























 

                             - 7 -




                  3.  ' 




           ,      ,
      .TITLE (    -
   )    .END (  -
   ).    , ,  ,  
     ".MAIN.".

        '      
     ,        
     ( ).

            .    -  
    ,     
    ,      .

             . 2.

             !-------------------------!-----
             !            1            !   A
             !-----               -----!   !
             !            0            !   !
             !-------------------------!   !
             !            !  ,
             !-----               -----! 
             !                   !  
             !-------------------------!   !
             .                         .   !
             .                   .   !
             .                         .   V
             !-------------------------!-----
             !     !
             !                    !
             !-------------------------!

                      . 2

               
    :

                   - 1;
                   - 0.

        2-  3-        -
       (    -
   ).

                  
            .  
   ,     (   -
   )    .

        ,       ,  
    .       -
    .

 

                             - 8 -




                  
    ( ).     . 1.

                                           1
              -------------------------------------
                 !   !    
              -------------------------------------
                       !           !  
                  1    !      GSD  ! 
                       !           ! 
              ---------!-----------!---------------
                       !           !  
                  2    !   ENDGSD  !  GSD 
                       !           ! 
              ---------!-----------!---------------
                       !           ! 
                  3    !      TXT  ! 
                       !           ! 
              ---------!-----------!---------------
                       !           !  
                  4    !      RLD  ! 
                       !           ! 
                       !           ! 
              ---------!-----------!---------------
                       !           !  
                       !           ! 
                  5    !      ISD  !  (
                       !           ! 
                       !           ! )
              ---------!-----------!---------------
                       !           !  
                  6    !   ENDMOD  ! '
                       !           ! 
              ---------!-----------!---------------
                       !           ! 
                  7    !   TITLIB  ! 
                       !           ! 
              ---------!-----------!---------------
                       !           !  
                 10    !   ENDLIB  ! 
                       !           ! 

          '      GSD.
         GSD,   
        (.  3).    
   GSD        ENDGSD  (
     GSD).  ISD       
      GSD  ENDMOD.

         '        (PSECT,
   VSECT  CSECT),         GSD.  
          -
        .

           '      
       ' ,   
     '    .   -
    ,        
   ,       GSD,  
 

                             - 9 -




     '   .

          ,   
    (.ABS.),  ,   -
    0   ().        
    GSD,    , '-
      ,    -
    ().

              -
    ,   ,        ,
     0.        ,
      '   .

         ,    ,  -
        ' ,    
       GSD.       
       GSD (    ,  
     )     PSECT.    
     ' PSECT.


        .  16-     
       ,      
       8-  ;  
     .

          '     .
         ,   -
      .      0  
   10 ().        
        .



























 

                             - 10 -




                     ' 


             !--------!
             !   GSD  !    GSD
             !--------!
             !   RLD  !    RLD
             !--------!
             !   GSD  !    GSD
             !--------!---
             !   TXT  ! !
             !--------! !   
             !   TXT  ! V
             !--------!---
             !   RLD  !    
             !--------!   
                 ...
                 ...
                 ...
             !--------!
             !   GSD  !
             !--------!
             ! ENDGSD !     GSD
             !--------!---
             !   ISD  ! !   
             !--------! !  
             !   ISD  ! V  
             !--------!---
             !   TXT  !
             !--------!
             !   TXT  !
             !--------!
             !   TXT  !
             !--------!
             !   RLD  !
             !--------!
             ! ENDMOD !    
             !--------!

                             . 3

         ENDMOD (  '  )  
      ' .



        3.1.  GSD



         GSD   ,   -
             
    ,  .

         GSD   ,    
   ,   . 4.



 

                             - 11 -




                 


               !-------------------!  
               !    0    !    1    !   GSD
               !-------------------!
               !    RAD50  !
               !---             ---!
               !     (2 )     !
               !---------!---------!
               !     !   !
               !---------!---------!
               !   !
               !-------------------!

                      . 4

             GSD    
      ().    -
       :

   0      -   ' ;

   1      -    (.CSECT);

   2      -         (   
            );

   3      -    ;

   4      -    ;

   5      -       (.ASECT,  .CSECT
             .PSECT);

   6      -    (.IDENT);

   7      -              
            (.VSECT).



        3.1.1.   '  (=0)



         '    '    '
      ,   . 5.











 

                             - 12 -




             !-----------------!
             !        !
             !---           ---!
             !     RAD50  !
             !-----------------!
             !    0   !   0    !
             !-----------------!
             !        0        !
             !-----------------!

                   . 5

          '          
   ()        '  ,
      ,    -
   .          '  
    ' .

         '     -
   :

    1  2
          -       RAD50;        
             .TITLE;

    3
          -   () = 0;
          -   () = 0;

    4
          -  = 0.



        3.1.2.            
               (=1)



              .  
       (    .ASECT,
         .CSECT)     
   .PSECT.       
    .

             . 6.

             !-------------------!
             !     !
             !---             ---!
             !   RAD50!
             !-------------------!
             !    1   ! -!
             !        !    !
             !-------------------!
             !  !
             !-------------------!

                   . 6
 

                             - 13 -




         ' .ASECT   .CSECT      
   .PSECT.  ,    '     .CSECT
    .PSECT   :

           .PSECT ,RW,I,LCL,REL,CON

         '  .CSECT   .PSECT
     :

           .PSECT NAME,RW,I,GBL,REL,OVR

         ' .ASECT  .PSECT  -
    :

           .PSECT .ABS.,RW,I,GBL,ABS,OVR

          .ASECT   .CSECT    .PSECT  
    ,  .



        3.1.3.            
                (=2)



             ( -
      ). ..    -
     ,       -
    .    GSD  
     .

            . 7.


























 

                             - 14 -




             !-------------------!
             !         !
             !---             ---!
             !      RAD50   !
             !-------------------!
             !    2    !    0    !
             !-------------------!
             !     !
             !-------------------!


                   . 7

             -
   :

    1  2
          -     RAD50;

    3
          -   ()  0;
          -   ()  2;

    4
          -  .



        3.1.4.     (=3)



            '    
     PSECT    :

    1  2
          -      RAD50;

    3
          -   () = 0;
          -   () = 3;

    4
          -  ,     .END,  -
                ;      
             ,      
              1;   LINK  
             ,    
            ;        ,  
              1   40  -
            .

                 .
   8.





 

                             - 15 -




             !-------------------!
             !      PSECT     !
             !---             ---!
             !      RAD50   !
             !-------------------!
             !    3    !    0    !
             !-------------------!
             !           !
             !-------------------!

                   . 8


        .  ,  PSECT  ,
            ,
       000001.



        3.1.5.           
               (=4)



               -
   :

    1  2
          -      RAD50;

    3
          -   ();
          -   ( = 4);

    4
          - ;     
                ;      
             4-     
                  -
             .

               
    :  3  5.

              -
   :

     3
            0 -      ;
            1 - ;
     5
            0 -  ;
            1 -  .






 

                             - 16 -




        3.1.6.            
               (=5)



                -
      .

              .
    ,  ,   ,  
     ,    . -
   ,          
        .

               .
   9.

             !-------------------!
             !     !
             !---             ---!
             !   RAD50!
             !-------------------!
             !    5    !   !
             !-------------------!
             !  !
             !-------------------!

                   . 9

             -
   :

    1  2
          -      RADIX 50;

     3
          -   ();
          -   ( = 5);

    4
          - ,       2
            (..      ,    
                ).

        :
        1.       
    .
        2.        
   .PSECT   COMMON     -
    .       .    
   ,       .  -
   ,     SYM,      
   :

             .PSECT SYM,

          ,    :


 

                             - 17 -




             .PSECT ,

          256  :

          -    ;
          -       -
            ;
          - 254    .

                
   ():

      (RW)
          - , ,    -
                 -
            ;

     (RO)
          - , ,    -
                ,    -
             (  );

     (ABS)
          -  ,     -
             ;    ,  
                  -
            ;

     (REL)
          -  ,    -
            ;          LINK
                      
            ;      -
            ;

     (GBL)
          - ,        
            ;         ,
                ,  -
                    ;   
                    
               ,  -
              ;

     (LCL)
          -  ,   '-
             ,    ';  -
              ;

    (D)
          - ,  ,       
              ;      -
            ,         
            ;

    (I)
          - ,  ,       
                ;    
            ;
 

                             - 18 -




     (OVR)
          - , ,     
              , '    -
            ,         
              ;      
                     '-
             ;     -
             " ";

     (CON)
          - , ,      -
             , '    ,
                  '  ;  
               .

             
     :

          2
                 0 -    (CON);
                 1 -  (OVR);
          5
                 0 -  (ABS);
                 1 -  (REL);
          6
                 0 -  (LCL);
                 1 -  (GBL);
          7
                 0 -    (I);
                 1 -    (D).

                 -
       : .ASECT 
   .CSECT.        -
    .       -
         .

          ,       -
     :

           .ASECT        RW, I, GBL, ABS, OVR
           .CSECT        RW, I, LCL, REL, CON
           .CSECT  // RW, I, GBL, REL, OVR
            COMMON // RW, D, GBL, REL, OVR



        3.1.7.    (=6)



               
   .          
   .IDENT  ,    ,    
     .

            . 10.


 

                             - 19 -




             !-------------------!
             !         !
             !---             ---!
             !    RAD50  !
             !-------------------!
             !    0    !    0    !
             !-------------------!
             !         0         !
             !-------------------!

                   . 10

           :

    1  2
          -     RAD50;

    3  4
          -  .



        3.1.8. '   (=7)



               -
          .
               
   PSECT,    RLD    .

           (   32 ) 
      .   
    ,       
   .         
    .         -
      .VSECT.

          VSECT   PSECT    
   :

           .PSECT .VIR.,RW,D,GBL,REL,CON

                     
   32- .    ,     
   .

                 ,
        .


        .     ,
    '  .

            "'      "
     . 11.



 

                             - 20 -




                     !-------------------!
                     !         !
                     !        !
                     !---             ---!
                     !     RAD50    !
                     !-------------------!
                     !    7    !  . !
                     !-------------------!
                     !              !
                     !-------------------!

                           . 11



        3.2.  ENDGSD



         ENDGSD ,     GSD,
      .

          '       
   ENDGSD.       (. 12).

                    !-------------------!
                    !    0    !    2    !
                    !-------------------!

                          . 12



        3.3.  TXT



                 
   ,     
     .    ,  -
     2 .

                    
   ,       
   TXT.     TXT   RLD, -
       .        
    ,      
   RLD.

          TXT  ,       RLD,    
      42 .

          TXT   . 13.






 

                             - 21 -




                    !----------------!
                    !          !
                    !----------------!
                    !   !
                    !----------------!
                    .        .
                    .            .
                    .       .
                    !----------------!

                         . 13

          TXT        
   ( ),  3.

            TXT      
      PSECT.     TXT  
   ,   ,    RLD    
   RLD  '  PSECT.



        3.4.  RLD



          RLD         ,
     ,    ,  
      .

         RLD     14    .  
   (. 14)     .   -
         .    
        .

                       RLD

                !15            8!    7!6         0!
                !---------------!-----!-----------!
                !  !  B  !        !
                !       !     !    !
                !---------------!-----!-----------!
                !     (           !
                !-----                       -----!
                !            RADIX 50 )           !
                !---------------------------------!
                !                        !
                !---------------------------------!

                             . 14

          RLD (. . 14)   -
   ,  LINK    ,  -
      .

           ,   ,  
   RLD,     TXT.   
      TXT,    
   PSECT  .
 

                             - 22 -




         . 14    ,  -
      :

          -   ;       
              TXT       (
            ) ;     -
            ,        
                TXT;    
              ,    
            ;

          -   ( 0-6);    128 
            ;        14  
            ;

          -   ( "B");    -
            ;   ,   ; -
               ,   -
            :
                 -  B=0    ;
                 -  B=1   ;

          -           
             ;

          - ;        
             ,     -
             .

           :

    1  -  ;

    2  -  ;

    3  -   ;

    4  -   ;

    5  -   ;

    6  -    ;

    7  -    ;

    10 -   ;

    11 -    (.LIMIT);

    12 -   ;

    13 -  ;

    14 -    ;

    15 -    ;

    16 -      -
            ;
 

                             - 23 -




    17 -  .



        3.4.1.  



               
    .         
      ,   -
         , .. 
      ,   
      TXT.


              1.                     2.

    A:      MOV     #A,R0               .WORD   A


             ,  -
     . 15.

                        !-------------------!
                        ! ! B  ! 1  !
                        !-------------------!
                        !          !
                        !-------------------!

                              . 15



        3.4.2.  



                  -
    .      
          .


              1.                     2.

           MOV     #GLOBAL,R0           .WORD   GLOBAL


             . 16.

                       !-------------------!
                       ! ! B  ! 2  !
                       !-------------------!
                       !      !
                       !---            ----!
                       !    RAD50     !
                       !-------------------!
                              . 16

 

                             - 24 -




        3.4.3.   



                  
        .


              1.                     2.

           CLR     177550               MOV     177550,R0


             . 17.

                      !-------------------!
                      ! ! B  ! 3  !
                      !-------------------!
                      !          !
                      !-------------------!

                            . 17



        3.4.4.   



                -
    .     -
      ,        
   (  +2),      -
   ,    .    
           
    (  +2).


              1.                     2.

            CLR     GLOBAL              MOV        GLOBAL,R0


             . 18.

                      !-------------------!
                      ! ! B  ! 4  !
                      !-------------------!
                      !      !
                      !---             ---!
                      !     RAD50    !
                      !-------------------!

                             . 18





 

                             - 25 -




        3.4.5.   



                -
       .  -
      ,     
          .


              1.                     2.

           MOV       #GLOBAL+2,R0       .WORD      GLOBAL-4


             . 19.

                      !-------------------!
                      ! ! B  ! 5  !
                      !-------------------!
                      !      !
                      !---            ----!
                      !    RAD50     !
                      !-------------------!
                      !          !
                      !-------------------!

                            . 19



        3.4.6.        
               



                
     .      
           -
    .     
    +2,         
   .       .


              1.                     2.

           CLR     GLOBAL+2             MOV     GLOBAL-5,R0


             . 20.









 

                             - 26 -




                      !-------------------!
                      ! ! B  ! 6  !
                      !-------------------!
                      !      !
                      !---            ----!
                      !    RAD50     !
                      !-------------------!
                      !          !
                      !-------------------!

                            . 20



        3.4.7.    



           '  PSECT   -
    .       +2
    '  .      
          
     .

             . 21.

                      !-------------------!
                      !    0    ! B  ! 7  !
                      !-------------------!
                      !          !
                      !---            ----!
                      !    RAD50     !
                      !-------------------!
                      !          !
                      !-------------------!

                            . 21



        3.4.8.   



               -
   .           
    PSECT       
      .


              1.                     2.

           .  =   .+N                   .BLKB     N


             . 22.



 

                             - 27 -




                      !-------------------!
                      !   0     ! B  ! 10 !
                      !-------------------!
                      !          !
                      !-------------------!

                             . 22



        3.4.9.   



               
    .LIMIT.      
    (      )    
     .      
        .


   .

           .LIMIT


             . 23.

                      !-------------------!
                      ! ! B  ! 11 !
                      !-------------------!

                             . 23



        3.4.10.   



                  
    PSECT,      ,    
       PSECT.    
        PSECT   -
       .


             1.                     2.

           .PSECT  A                   .PSECT  A
    B:                        B:
           . . .                       . . .
           . . .                       . . .
           . . .                       . . .

           .PSECT  C                   .PSECT  C
           MOV     #B,R0               .WORD B


 

                             - 28 -




             . 24.

                      !-------------------!
                      ! ! B  ! 12 !
                      !-------------------!
                      !          !
                      !---            ----!
                      !     RAD50    !
                      !-------------------!

                            . 24



        3.4.11.         
                



                  
      PSECT,      .
             
   PSECT.       +2,  -
        ,   -
       .


   .

           .PSECT  A
    B:
           . . .
           . . .
           . . .

           .PSECT  C
           MOV     B,R0


             . 25.

                      !-------------------!
                      ! ! B  ! 14 !
                      !-------------------!
                      !          !
                      !---            ----!
                      !     RAD50    !
                      !-------------------!

                            . 25









 

                             - 29 -




        3.4.12.    



                
    PSECT,       .  
        PSECT.  -
           -
       .


             1.                     2.

           .PSECT  A                   .PSECT  A
    B:                       B:
           . . .                       . . .
           . . .                       . . .
           . . .                       . . .
    C:                       C:
           . . .                       . . .
           . . .                       . . .
           . . .                       . . .

           .PSECT  D
           MOV     #B+10,R0            .WORD   B+10
           MOV     #C,R0               .WORD   C


             . 26.

                      !-------------------!
                      ! ! B  ! 15 !
                      !-------------------!
                      !          !
                      !---            ----!
                      !    RAD50     !
                      !-------------------!
                      !          !
                      !-------------------!

                            . 26



        3.4.13.          
                 



                
     PSECT,     .  -
          PSECT  
      .      
       +2,         
   .      .




 

                             - 30 -




   .

           .PSECT  A
    B:
           . . .
           . . .
           . . .

    C:

           .PSECT  D
           MOV     B+10,R0
           MOV     C,R0


             . 27.

                      !-------------------!
                      ! ! B  ! 16 !
                      !-------------------!
                      !          !
                      !---            ----!
                      !    RAD50     !
                      !-------------------!
                      !          !
                      !-------------------!

                            . 27



        3.4.14.  



                  
   .    -  -
   ,        -
        ,    
   ,         
   ,           PSECT,
       .

          RLD   , 
      .        
    ,      RLD      
     .  " " (  12
    13) ,       -
       .


        .  ,   -
      ,     -
    .

                16-
    ,     -
      2.      ,  
      .
 

                             - 31 -




        :
        1.       0.
      .
        2.      16 . 
     ,        .  
     ,   -
        (   -
   ).
        3.       (-
   )   16-  PC.

             :

    0     -  ;

    1     -  (+);

    2     -  (-);

    3     -  (*);

    4     -  (/);

    5     -  "" (&);

    6     -  "" (!);

    7     -  "" ;

   10     -  (-);

   11     -  (^C);

   12     -   ( );

   13     -           
            ( );

   16     -    ;      
             ,         
            RAD50;

   17     -   ;   
             ,   ,     ,
               ;

   20     -  ;      ,
             .











 

                             - 32 -




   .

           .PSECT  ALPHA
    A:
           . . .
           . . .
           . . .

           .PSECT  BETA
    B:
           . . .
           . . .
           . . .

           MOV     #A+B-<G1/G2&^C<177120!G3>>,R1


             . 28.

                      !-------------------!
                      ! ! B  ! 17 !
                      !-------------------!
                      !      !
                      !-------------------!
                      !   12    !         !
                      !-------------------!

                            . 28



        3.5.  ENDMOD



         '       
   ENDMOD (  ).  ENDMOD      
   ,       (
   =6).




















 

                             - 33 -




                      4.   STB




               -
      (STB).  STB   -
      , :

          -      "X == 10", 
              STB  "X = 10", .. 
              ;

          -     A = FOO,    STB
                FOO.

         STB      
        .  
             
   STB. ,        ,
     STB     .   
           -
    ,     .    
     STB          
      .

         STB (. 29)       GSD,
       ENDGSD  ENDMOD.

                        STB
                   !-----------------------!
                   !  '  !
                   !   ( GSD =0)   !
                   !-----------------------!
                   !    !
                   !              !
                   !   ( GSB =6)   !
                   !-----------------------!
                   !   !
                   !   ( GSB =1)   !
                   !-----------------------!
                   !   - !
                   !             !
                   !   ( GSB =4)   !
                   !-----------------------!
                   .                       .
                   .                       .
                   .                       .
                   !-----------------------!
                   !   - !
                   !             !
                   !   ( GSB =4)   !
                   !-----------------------!
                   !      ENDGSD       !
                   !-----------------------!
                   !      ENDMOD       !
                   !-----------------------!

                           . 29
 

                             - 34 -




                 5.   




           ,    -
      .   -
      '      ,  
             LIBRARY    
   CREATE.

        ' ,    ,  
    .  '     
    .

         '     -
    .    ,    ,
    '     ,  
       . '  
              
     (. 30).

               .
    ,       -
   .    ,        
        .

































 

                             - 35 -




                   ' 


                                           
        1   !-----!                   !-----!-----!
                  !  1  !                   !  2  !  1  !
                  !-----!                   !-----!-----!
                  !  2  !                   !  4  !  3  !
                  !-----!                   !-----!-----!
                  !  3  !                         !  5  !
                  !-----!                         !-----!
                  !  4  !
                  !-----!
                  !  5  !
                  !-----!

                                           
       2    !-----!                   !-----!-----!
                  !  1  !                   !  2  !  1  !
                  !-----!                   !-----!-----!
                  !  2  !                   !  4  !  3  !
                  !-----!                   !-----!-----!
                  !  3  !                         !  5  !
                  !-----!                         !-----!
                  !  4  !
                  !-----!
                  !  5  !
                  !-----!

                    '  (1  2).

                                          
       1    !-----!       1    !-----!-----!
                  !  1  !                  !  2  !  1  !
                  !-----!                  !-----!-----!
                  !  2  !                  !  4  !  3  !
                  !-----!                  !-----!-----!
                  !  3  !       2    !  1  !  5  !
                  !-----!                  !-----!-----!
                  !  4  !                  !  3  !  2  !
                  !-----!                  !-----!-----!
                  !  5  !                  !  5  !  4  !
       2    !-----!                  !-----!-----!
                  !  1  !
                  !-----!
                  !  2  !
                  !-----!
                  !  3  !
                  !-----!
                  !  4  !
                  !-----!
                  !  5  !
                  !-----!

                             . 30

            :  -
     ' .   ' -
       OBJ,  - MAC.
 

                             - 36 -




               ,  
     , ,   , 
       (. 31).


                     

                     !---------------!
                     !      !
                     !  !
                     !          !
                     !---------------!
                     !        !
                     !   '   !
                     !        !
                     !---------------!
                     !               !
                     .   '   .
                     .         .
                     .               .
                     !---------------!
                     !      !
                     !  !
                     !          !
                     !---------------!

                          . 31

                 
    ,   .



        5.1.  



               -
         .   -
       ,    
     .      
     . 2.

                .
     ,        ,
        .













 

                             - 37 -




                                            2
     -----------------------------------------------
       !  !    
     -----------------------------------------------
         0   !   1001   !    
     --------!----------!---------------------------
         2   !    310   !   
     --------!----------!---------------------------
         4   !      0   !       
     --------!----------!---------------------------
         6   !          !   ( 0 -   )
     --------!----------!---------------------------
        10   !          !       
     --------!----------!----                   ----
        12   !          !         
     --------!----------!---------------------------
        14   !      0   !       
     --------!----------!---------------------------
        .    !      .   !
        .    !      .   !       
        .    !      .   !
     --------!----------!---------------------------
        32   !     10   !   
     --------!----------!---------------------------
        34   !          !   
             !          !       
     --------!----------!---------------------------
             !          !  ,
        36   !          !       
             !          !  ( 
             !          !  200)
     --------!----------!---------------------------
        40   !          !   
             !          !  

         36      ,
       .    -
           LIBR  
    /M:N. "N"     200 (
       2 ).

             -
    (MNT).            2
        . 32.    15    3-
        ' .

        !-------------------------------------------!
        !                (               !
        !--------                           --------!
        !                RAD50)                !
        !-------------------------------------------!
        !  !       !
        !-------------------------------------------!
        !  - !     !
        !  (7 ) !         (9 )            !
        !-------------------------------------------!

                             . 32

 

                             - 38 -




               -
      .   
       .   -
     ,     2  -
   .       /M  (  LIBR).
             177777
   (-1).   ,    
     .    3 -
    ,      .



        5.2.  ' 


          '   
        . 3.

                                            3
     -----------------------------------------------
       !  !    
     -----------------------------------------------
         0   !      1   !      
     --------!----------!----                   ----
         2   !     42   !        
     --------!----------!---------------------------
         4   !      7   !       
     --------!----------!---------------------------
         6   !    310   !    
     --------!----------!---------------------------
        10   !      0   !      
     --------!----------!---------------------------
        12   !          !  (0- )
     --------!----------!---------------------------
        14   !          !      
     --------!----------!----                   ----
        16   !          !        
     --------!----------!---------------------------
        20   !      0   ! 1,   
             !          !   /X
     --------!----------!---------------------------
         .   !      .   !
         .   !      .   !      
         .   !      .   !
     --------!----------!---------------------------
        26   !     10   !    
             !          !      
     --------!----------!---------------------------
        30   !          !      ,
             !          !     
     --------!----------!---------------------------
        32   !      0   !      
     --------!----------!---------------------------
        34   !          !  
             !          !    
     --------!----------!---------------------------
        36   !          !   
     --------!----------!---------------------------
        40   !          !       
 

                             - 39 -




              .

             '    
   ,     (. . 32).  -
     ,   '   -
       ().

         ,           
   '     /N  (  LIBR),
    15  "    "  -
     1.       -
    LIBRARY,     .

         '   -
      ( 40).   , -
           -
   .          
   .



        5.3.    


         ,  ,        -
    .        
   .      . 33.

                     !-----!-----!
                     !  0  !   1 !
                     !-----!-----!
                     !  0  !  10 !
                     !-----!-----!
                     !  0  !  10 !
                     !-----!-----!
                     !  0  !   0 !
                     !-----!-----!
                     !     ! 357 !
                     !-----!-----!

                       . 33

            0.      
   :

    1
          -   ;

    2
          -    ;

    3
          -    ;

    4
          -   ( 0);



 

                             - 40 -




    5
          -    ,  
             .




                      6.   LDA




           LDA      
         
     ABSLOAD ( LDA.SAV).

               
      -, -  -.  -
      LDA      -
   .

          LDA      MACRO    
   /ENABL:ABS   LINK    /L,    
    LINK   /LDA.

          LDA   ,   -
       .    -
        .    
     ,  6 (   ),
      .   ,  -
          .  
    ,     .

            LDA   .
   34.

          LDA    , 
     ,     
    .




















 

                             - 41 -




                   !--------------------------!
                   !            1             !
                   !-----                -----!
                   !            0             !
                   !--------------------------!
                   !             !
                   !-----                -----!
                   !                    !
                   !--------------------------!
                   !           !
                   !------               -----!
                   !                  !
                   !--------------------------!
                   .                          .
                   .                    .
                   .                          .
                   !--------------------------!
                   !      !
                   !         1           !
                   !--------------------------!
                   .                          .
                   .                          .
                   !--------------------------!
                   !            1             !
                   !-----                -----!
                   !            0             !
                   !--------------------------!
                   !             !
                   !-----                -----!
                   !                    !
                   !--------------------------!
                   !           !
                   !-----                -----!
                   !                  !
                   !--------------------------!
                   .                          .
                   .                    .
                   .                          .
                   !--------------------------!
                   !      !
                   !          N          !
                   !--------------------------!
                   !             1            !
                   !-----                -----!
                   !             0            !
                   !--------------------------!
                   !             6            !
                   !-----                -----!
                   !             0            !
                   !--------------------------!
                   !            !
                   !-----                -----!
                   !                 !
                   !--------------------------!
                   !      !
                   !--------------------------!

                            . 34

 

                             - 42 -




                      7.   SAV




         SAV    ,    
      .    
    .

             , -
      .      
     .

                  
     :

   0      -     (VIR)    VIRTUAL    
            RAD50; ,   
              /V;

   2      -       ,  
            ; ,       
                 /V;

   4 - 12 -  ;

   14, 16 -       BPT;  -
              ,        XM-  
                  /R;

   20, 22 -       IOT;  -
                    XM-,    
                 /R;

   24 - 32
          -  ;

   34, 36 -      TRAP;  -
            ,       
              /R;

   40     -   ;

   42     -         (
              /M);

   44     -    (JSW);

   46     -   USR (0    -
            );

   50     -   ,  ;

   52 - 54
          -  ;

   56     -  TS-       
              ,    ;

 

                             - 43 -




   60 - 64
          -  ;

   66     -        (-
            ,      /V);

   70 - 356
          -  ;

   360 - 377
          -     .

         40,     ,  
        /TRANSFER. ,
        2000 ():

           .LINK PROGR.OBJ/TRANSFER:2000

         PROGR.SAV,  ,  
     2000 .      
      .END.

         360 - 377        
         -
    KMON.      
     256         ,  
             -
   .    KMON  , 
       KMON  USR.

             KMON    -
           -
   ,    RMON.  ,   
   , ,    ,      ,
         .

          R  RUN     
     SAV.  RUN '  :  GET
    START.     KMON  
       SAV        USR,  
       40-62    360-377.    
     (LOWMAP),   RMON,      
    , KMON     (  
    RMON)   USR  ,   .
   ,    ,    
       RMON,   . 
   KMON    50     
       ,      
   .

           RUN  GET KMON  -
        .    
    ,  KMON      -
       SWAP.SYS.    -
     KMON,        RMON,
         ,  -
        SWAP.SYS     
   KMON , , USR.

 

                             - 44 -




            R, KMON    
     ,     -
   .         RMON      
       1000  ( R  -
     SWAP.SYS).  ,  KMON   USR  
    ,    .




                      8.   REL




         REL    ,    
      .

            REL    
    FB/XM-.

              -
     LINK      /R      LINK      
   /FOREGROUND.    '  '    
     .

        ' ,     
   REL,   ,    SAV   -
    1000.       
    .ASECT         0
    777    REL. ,        SAV,
     REL          
   .      -
       FRUN (SRUN)      
   ,       
       .

            ,   -
         (  ),  
         .

          ,  ,   -
    SAV, :

   52     -     ;

   54     -     ;        128
            ();    /R:N;

   56     -       (0,    
            );

   60     -   (REL)   RAD50;

   62     -  ,        
            ;

   64     -          
            .
 

                             - 45 -




             REL:   -
   .



        8.1.   



            -
     . 35.

                      !---------------!
                      !        !
                      !           !
                      !---------------!
                      !               !
                      .    .
                      .      .
                      .               .
                      !---------------!
                      !               !
                      .          .
                      .    .
                      .               .
                      !---------------!

                          . 35

               
          (  
    1000).  ,    
     ,    .   15  
     (  ).  .
   36     .

    BLOCK NUMBER 003
    000/ 000002 000007 100012 000040 . . .
    020/ 177776 000000 000000 000000 . . .
    040/ 000000 000000 000000 000000 . . .
     .
     .
     .
    760/ 000000 000000 000000 000000 . . .

              . 36

          (.  .  36)    
   : 4, 16, 24, 100.  24    -
   . ,   177776 (-2),  -
          .

           FRUN    
       USR     -
      .

          52        
          -
     KMON  USR.     -
 

                             - 46 -




     .

                 
   .  ,       -
   ,   (      
                
   ).

                
   .



        8.2.   


          ,  
    (. 37),    -
    (. . 35). ,   , 
      .

              .
            -
    .       
             
     ,        
          FRUN  SRUN.

           (    )
     177777 (-1),     -
     - 177776 (-2).




























 

                             - 47 -




                       !--------------!
                       !       !
                       !          !
                       !--------------!
                       !   !
                       !     !
                       !   1  !
                       !--------------!
                       !   !
                       !   !
                       !   1  !
                       !--------------!
                       .              .
                       .              .
                       .              .
                       !--------------!
                       !   !
                       !   !
                       !   N  !
                       !--------------!
                       !         !
                       !   !
                       !     !
                       !      !
                       !--------------!
                       !      -1      !
                       !--------------!
                       !         !
                       !   !
                       !   !
                       !   1  !
                       !--------------!
                       !      -1      !
                       !--------------!
                       .              .
                       .              .
                       .              .
                       !--------------!
                       !         !
                       !   !
                       !   !
                       !   N  !
                       !--------------!
                       !      -2      !
                       !--------------!

                           . 37

               -
   :

          -    KMON    
            KMON; USR    52  56   
                    -
            ;

          -  TXT     ;
                (  -
                 62)      
 

                             - 48 -




             KMON; KMON       
                ;    
                -
              .   -
              ,     
                  
                .      
                     
            ,    .

                FRUN  (SRUN)
   ,  ,  .

                  
      .   
   , ,   ,  , 
     ,     (.  38):  
      < * 2>,    - -
      .

    BLOCK NUMBER 003
    000/ 000002 177777 000007 000340 100012 000020 . . .
    020/ 177776 000000 000000 000000 000000 000000 . . .
    040/ 000000 000000 000000 000000 000000 000000 . . .
     .
     .
     .
    760/ 000000 000000 000000 000000 000000 000000 . . .

                             . 38

        ,    , -
    ,         -
    :

          -   ;
          -   ;
          -      .





















 

                             - 49 -




              9.    




         CREF       
   .         (-
    .CHAIN)     (,  ,  
      ).  CREF  -
          -
   ,   .

          CREF     -
           -
      (    
     500  776). CREF   :

        500   .RAD50 /SY /
        502   .RAD50 /CRE/
        504   .RAD50 /F  /
        506   .RAD50 /SAV/

          -     CREF;

       510
          -    ;

       512
          -      .RAD50;

       514
          -      1 (
            );

       516
          -    ;

       520
          -      .RAD50;

       524
          -  :

               0 - 80 ;

              -1 - 132 ;

        526   .RAD50 /DEV/
        530   .RAD50 /FIL/
        532   .RAD50 /NAM/
        534   .RAD50 /TYP/

          - ,  CREF     
            ;    0,  CREF 
                 ;

    536-776
          -   -7,  CREF   -
               (  ).
 

                             - 50 -




          ,    CREF,     
   12- ()        -
   .     CREF    
   (      ):

    0     -   :

             0 - 4
                 -  ,  CREF   
                    ;  -7     5
                   ;

             5 - 7
                 -   ;   -
                         -
                   ;

    1 -  6
          -    -7;

    7 - 10
          -   ();     
            ,    -1;

   11 - 12
          -   ();

   13     -  ,  CREF 
             ;         
                     
              .




























 

                             - 51 -




            10.    




                
     (EL)    -
         .    
       ( ,  
   )    .      
         ()  -
            -
        ,   
   .       -
    ,         
      .      
    ,      -
   .

             
    ,        200
        '   256  (-
   ).    EL    -
   ,   "C"       
    . ..     
      ,    
         -
   .

          ,  -,   -
          
             
      ,     -
   .  EL        
    (        -
   )   ,  256- ()    
   . ..       ,
          .   
           
     (..  )    -
      ERRLOG.DAT.  . 39   
    .

               
           
        ,      
   ,  ,         
     .    
      10 ()   -
    /.









 

                             - 52 -





                 


       !------------!
       !  #1 !--
       !------------! !        !--------------------!
           .....      !------->!     !---!
       !------------! !        !--------------------!   !
       !  #N !--        !        !<--!
       !------------!          !--------------------!   !
                               !                    !---!
       !---------------!       !          !
       !        !------>!              !----!
       !---------------!/ \    !--------------------!    !
                         !   --!      !-!  !
                         !   ! !--------------------! !  !
                         !   !-!   # 1 ! !  !
            !------------!   ! !--------------------! !<--
            !                !-!   # 2 !-!
           / \               ! !--------------------!
            !                !
            !                V
       !--------!      !-----------------!      !--------!
       ! ERROUT !<-----!  ERRLOG.DAT !<-----! ELINIT !
       !--------!      !-----------------!      !--------!
            !
            V
         !-----!
         ! / \ !   
         !/   \!      


   
          -        -
             $ELPTR  RMON;

   ELINIT -   ERRLOG.DAT   EL;

   
          -   EL    
                 ;

   ERROUT -  ;    EL    
                            
            ERRLOG.DAT      -
            .


                             . 39

        . 40      -
       .






 

                             - 53 -




              
                

     !--------------------------!--------------------------!
     !               !              !
     !--------------------------!--------------------------!
     !   !            !
     !--------------------------!--------------------------!
     !                   (Q.BLKN)      !
     !--------------------------!--------------------------!
     ! !   ! -!                       !
     !(1 -! ! !              !
     ! )  ! (4 -! (3 - !        (8 )      !
     !       ! )  ! )   !                          !
     !--------------------------!--------------------------!
     !                              !
     !--------------------------!--------------------------!
     !                     (Q.WCNT)             !
     !--------------------------!--------------------------!
     !     PAR1 (Q.PAR) -   -     !
     !--------------------------!--------------------------!
     !                     !                     !
     !                     !               !
     !                   !       !
     !--------------------------!--------------------------!
     !                    :              !
     !                    ...............                  !
     !--------------------------!--------------------------!

                             . 40
    . 41      .

             
               

     !--------------------------!--------------------------!
     !               !              !
     !--------------------------!--------------------------!
     !   !           - 1            !
     !--------------------------!--------------------------!
     ! !   ! -!                       !
     !(1 -! ! !              !
     ! )  ! (4 -! (3 - !        (8 )      !
     !       ! )  ! )   !                          !
     !--------------------------!--------------------------!
     !                     (Q.WCNT)             !
     !--------------------------!--------------------------!

                             . 41

         . 42        -
       .

          ID  . 42 :

   -2     -   -;

   -3     -    ;

 

                             - 54 -




   -4     -       -  -
            .

             - / 
               
                     

     !--------------------------!--------------------------!
     !               !              !
     !--------------------------!--------------------------!
     !      !           ID             !
     !--------------------------!--------------------------!
     !                          PC                         !
     !--------------------------!--------------------------!
     !                          PS                         !
     !--------------------------!--------------------------!
     !                         MPR1                        !
     !--------------------------!--------------------------!
     !                         MPR1                   !
     !--------------------------!--------------------------!
     !         (  16 .)      !
     !                    ..............                   !
     !--------------------------!--------------------------!
     !     (   !
     !                     -)                     !
     !--------------------------!--------------------------!
     !   - (    !
     !                     -)                     !
     !--------------------------!--------------------------!
     !    HIT/MISS (   -)  !
     !--------------------------!--------------------------!

                             . 42


























 

                             - 55 -




            11.    




              -
           
    .

               .
         .  
     ,      
      512 .   
    ,     ,
         -
     512 .

            2  5     -
    .   1     
   .

                (,
    ,      ..) -
     ,    .   -
         .

         . 43      -
   .































 

                             - 56 -




                

                   
            

       !----------------!
       !         0      !    
       !----------------!
       !         1      !    
       !----------------!----
       !         2      !  A
       !----------------!  !
       !         3      !  !  
       !----------------!  !    
       !         4      !  !
       !----------------!  !
       !         5      !  V
       !----------------!----
       !         6      !\
       !----------------! >------  1-  
       !         7      !/
       !----------------!
       !        10      !\
       !----------------! >------  2-  
       !        11      !/
       !----------------!
       !       ...      !
       !----------------!
       !               !\
       !----------------! >------  N-  
       !       +1      !/
       !----------------!
       !           !
       !       ...      !
       !----------------!
            
                             . 43



        11.1.   



          1        
               
   (. 4).      
          -
   .










 

                             - 57 -




                                                    4
    --------------------------------------------------------
             !                            !  
             !                            ! ( 
       !                  ! 
             !                            !   -7)
    --------------------------------------------------------
     000-201 !   !
             !            !
    ---------!----------------------------!-----------------
     204-251 !      !
             ! INITIALIZE/RESTORE         !
    ---------!----------------------------!-----------------
     700-701 !               ! 000000 ( -
             !                            !  )
    ---------!----------------------------!-----------------
     702-703 !      ! 000000 ( -
             ! ()!  )
    ---------!----------------------------!-----------------
     722-723 !                            ! 000001 ( -
             !                            !  )
    ---------!----------------------------!-----------------
     724-725 !           ! 000006 ( -
             !            !  )
    ---------!----------------------------!-----------------
     726-727 !               ! V3A ( 
             !                            ! RAD50)
    ---------!----------------------------!-----------------
     730-743 !           ! RAFOS 
             !                            ! 3 
    ---------!----------------------------!-----------------
     744-757 !              !
             ! ( )            !
    ---------!----------------------------!-----------------
     760-773 !        ! INERAFOS 
             !                            ! 4 
    ---------!----------------------------!-----------------
     776-777 !            !

               -
      ,     .

                     
   INITIALIZE        
    /VOLUMEID.      (   1
    12 )    ( 1  12 ).

        ,       RK1:  
        -
   :

             .INITIALIZE/VOLUMEID RK1:
             RK1:/INIT ARE YOU SURE?Y
             VOL ID? #1985
             OWNER NAME? SIMFOR

                   
    DUP.       
     DUP  DIR.
 

                             - 58 -




        11.2.  



                   
     .      1    31
   .      .

                    
   INITIALIZE   /SEGMENT:N    
    N   .    -
           
    DUP.

              
    N        
   (. 5).    .

                                                 5
        -------------------------------------------------
         ! !  
                   !     !   
        -------------------------------------------------
            RK:    !      16       !        256
        -----------!---------------!---------------------
            RF:    !       4       !         64
        -----------!---------------!---------------------
            DP:    !      31       !        256
        -----------!---------------!---------------------
            DX:    !       4       !         64



        11.2.1.    



            ,   
     .          
     ,     -
   ,  ,    ,  
    .  507    
      .

            :

   1 
          -  ,   ;   -
                      
              DUP    ;

   2 
          -        ;
                 ;  
                  
            ()   ;       
              2-   ;


 

                             - 59 -




   3 
          -  ,   .    
                    
             ;     -
                ;

   4 
          -            
            ;       -
                 DUP;

   5 
          -  ,    ,  -
               .



        11.2.2.      


                 
      .     
      .     -
         ,      .
       . 44.

                  

            !----------!-----------!---
            !  ! .!   
            !----------!-----------!---
            !    ( 2  !
            !---                ---!
            !       RAD50 )   !
            !----------------------!
            !   ( RAD50)!
            !----------------------!
            !     !
            !----------!-----------!
            ! N ! N   !
            !   ()!           !
            !----------!-----------!
            !          !
            !----------------------!---
            .                      .     
            .   .  
            .                      .
            !----------------------!---

                             . 44









 

                             - 60 -




        11.2.2.1.   



             :

    
          -  ;

    
          -   .

             ,  -
     . 6 (     ):

   
          - ,    .ENTER.  
                    
            .CLOSE,        
            (<UNUSED>);

    -   ,        -
             .CLOSE.      
             ;    ,  
            ,   (, ,      ..).
              DIR           
            <UNUSED>,           
            .     
                 DIR  
             <UNUSED>;

   
          - ,        .CLOSE.
                    
             , ..      
                 .   
                    ,      
              ,        
                  -
             .CLOSE;

    
          - ,     DELETE; -
                  
            RENAME   /PROTECTION    -
             PIP    /F/R;

     
          -          
                     
             .








 

                             - 61 -




                                      6
                   ---------------------------
                      ! 
                              !     
                   ---------------------------
                     !       400
                   -----------!---------------
                        !      1000
                   -----------!---------------
                    !      2000
                   -----------!---------------
                    !
                    !    102000
                   -----------!---------------
                        !
                         !      4000
                      !



        11.2.2.2.    



                  RAD50,
     .      
   1  6 ,    -  1  3 .



        11.2.2.3.  



             ,  -
    .         -
         .



        11.2.2.4.   ()   


                
    .        
   .

                
      -:

   RM  SJ
          -   RM/SJ-   6-  
             ;    ,   -
               ,    ;
                 .CLOSE -
                   ;



 

                             - 62 -




   FB  XM
          -   FB/XM-     -
                    ;  
                    -
             ,     (   -
                  
            ); ,     
             ,   ,   -
              .CLOSE,   
             ,      ;  
                 6-  -
              ;  ,      
             .CLOSE     
             (   ,  )
                  ,  -
               ;

   TS     -   TS-     -
               30  ;   -
               ,    
                   ,    
             ,   ;   -
                  .


        .    ,       
          .  
     ,      -
   ,        
    .

            RM/SJ-      (
      ).

          FB/XM-   -
    :

   0      -   ;

   2-14   -   ;

   16     -   .

          TS-      -
     .     -
    TS-.



        11.2.2.5. 



                .ENTER
            
     (. 45).

                   !15!14  10!9    5!4    0!
                   !--!------!------!------!
 

                             - 63 -




                   !  ! !  !   !
                   !--!------!------!------!

      (  0 -  4)
          -           
                  (,
            84)    72;

     (  5 -  9)
          -   1  31;

    ( 10 - 14)
          -   1  12.
                             . 45


        .         ,  
      0.



        11.2.2.6.  


           ,    -
       .    -
             
    .

              -
     DUP   INITIALIZE    -
         .    
      .

               
   .          
      ,    (,
    ,   ,  ).



        11.3.    , 
               


          ,   ,  
      31   .

         ,         
   ,         -
      .

           (MAX),     
     ,   :

                      MAX  =  31 * S                   (4.1)



 

                             - 64 -




    

     S    -    :

                        (512 - 5)
                    S = --------- - 2                  (4.2)
                         (7 + M)

           

              M  -     ;

            512  -    ;

              5  -  ,    -
                   .

          (4.2)   "-2"    
       :  ,   
   ,  O      
       (<UNUSED>)    
       (  ).

               
      ,      -
          -
      .      -
      .

               
     ,      
         -
   .  ,      ,  
         -
   .

               
      " "  .  
        /S   DUP  
     SQUEEZE.

                 
     " ",    -
         (4.3):

                              S
             MAX = (N - 1) * --- + S                   (4.3)
                              2

    

     N    -  ,   .

         (4.3)    
   .      -
    "" .  ,   -
     (   )    ,
       DUP.

 

                             - 65 -




        11.4.    


             
   :

            1    !-!
                 !*!      
                 !*!  ;   1
                 ! !
                 ! !
                 !-!


            1    !-!
                 !*!   1  , ..
                 !*!      
                 !*!    
                 !*!
                 !-!

             ,    
    1:

            1    !-!
                 !*!
                 !*!
                 ! !
                 ! !
                 !-!

             1 :

            1    !-!
                 !*!
                 !*!
                 !*!
                 !*!
                 !-!

                   
     ,       
   .         ,  
     :

          -        
                      
               ;
          -     ;
          -    ;
          -          -
            ,     .   
             ,        
              .

                 -
             
    ( ).

 

                             - 66 -




            :

           1   !-!
               !*!       1
               !*!     
               !*!
               !*!
               !-!


           1   !-!     : 
               !*!      -  -
               !*!        
               ! !     -  .  1 
               ! !      2
               !-!\
                   \   1-  2- 
                   /
           2   !-!/
               !*!
               !*!
               ! !
               ! !
               !-!

            ,     
   2-     3-,   :

           1   !-!
               !*!
               !*!
               ! !
               ! !
               !-!\
                   \   1-  2- 
                   /
           2   !-!/
               !*!
               !*!
               ! !
               ! !
               !-!\
                   \   2-  3- 
                   /
           3   !-!/
               !*!
               !*!
               ! !
               ! !
               !-!

                (-
   ).     .

        ,       2  
      ,      
        2.

             4- ,  -
 

                             - 67 -




         :

           1   !-!
               !*!
               !*!
               ! !
               ! !
               !-!\
                   \   1-  2- 
                   /
           2   !-!/
               !*!
               !*!
             --! !         2
             ! ! !      4- 
             ! !-!
             !
           3 ! !-!
             ! !*!
             ! !*!
             ! ! !<-!
             ! ! !  !
             ! !-!  !
             !      !
           4 ! !-!  !
             ->!*!  !    4  
               !*!  !    3, ..
               ! !--!    2 
               ! !          3
               !-!



        11.4.1.             
                    



          ,     ,
   ,        -
   :        
    -       
    .   ,   -
   ,         ,  
         .    
   ,       
     ,     .



        11.4.1.1.   1



              ,
        .   -
   ,   1   6  7 .  -
            
         
 

                             - 68 -




     .       
     DIRECTORY  - .

            :

                   ?MON-F-DIRECTORY I/O ERROR    
                   ?MON-F-DIR I/O ERR,
                   ;   

        .     
       .

              -
         (    
   ,          
        ).    
    .

          ,    ,
             
   TECO,     ,   
      ,   
     -7.      -
   .

          ,    DIRECTORY -
       ,     -
     ,   . -
       DIRECTORY/SUMMARY, -
              
    .    -
           
   ,     .



        11.4.1.2.    



               SIPP
       .  
     6000,       -
    .       ,
     .  6002    -
    ,   6004 -     ,
    .

                 
       (   -
    )   2000    4000. ,
      2,       
    10000 .        
          -
   .         
   , ,  ,   . 46.

               ,
             
 

                             - 69 -





           :                 :

              1                       2
              2                       4
              4                       3 ()
              3 ()           ?

                             . 46

         . 46    -  4;  
   ,    - 4.

              ,  ..
        .   ,  
    1      .  -
        ,  0.

          (. . 46)     3  
     0, ..       -
    .      -
        4,  
      0,   3.       
    3  .         
     .

         . 47    .    -
          -
   .

                9 

           :                 :
              1                       2
              2                       5
              5                       4
              4                       8
              8                       7 ()
              7 ()           ?
              3                       0
              6                       9
              9                       3

                             . 47

           (. . 47)    -
      1   8,      
     7.  ,     -
     7.       -
       8.    -
      ,    
   ,       (  -
      0).      3,  
      9.   9  
   6.  ,       
   8  (   ).    
        6  .  ,  8-
       6- (. 48).

 

                             - 70 -




                   (1) ---> (2)
                             !
                             !
                             V
                            (5)
                             !
                             !
                             V
                            (4)
                             !
                             !
                             V
                            (8)
                            / \
                           /   \
                          /     \
                        (6)     (7) () ---> ?
                         !
                         !
                         V
                        (9) ---> (3) ---> (0)

                             . 48



        11.4.1.3.        ,   
                    



              ()  
       ,    
    ,       ,
      .        
        COPY. -
    , ,       
     :

           COPY DX:*.* DX1:

              , 
   ,       .



        11.4.1.4.              
                   



               -
    ,        -
    ,    SIPP  DUP.   -
        SIPP        
   ,   , ..,    
       ,  -
   ,     .

 

                             - 71 -




             ,  -
            
      A.      SIPP,
          -
   .         -
    ,     DUP    
      :

           *OUTDEV:FILE=INPDEV:/G:START/E:ENDBLK/I/F

        INPDEV,   
    START,   OUTDEV     
   FILE.        -
      :

      COPY/DEV/FIL/STA:START/END:ENDBLK INPDEV: OUTDEV:FILE

            ,   -
          -
     (       ).
           
   ,           
   .



        11.5.      



             ,    -
        .      
         .ENTER.   
     ,   ,      
      ,       
     .

                
   .ENTER.   ""  0,    
             
     <UNUSED>,      
    <UNUSED> (     ).   -
     "-1",          <UNUSED>,
     .     0,    
       .

              -
   .

         . 49      ,    
     100 .








 

                             - 72 -




                      

                          !------------!
                          !        !
                          !  70  !
                          !------------!
                          !   !
                          !        !
                          ! 100  !
                          !------------!
                          !  <UNUSED>  !
                          !  40  !
                          !------------!
                          !        !
                          !  81    !
                          !------------!

                             . 49

                
     . ,    -
     ,  100 ,   -
    ,   25  (. 50).

                          !------------!
                          !        !
                          !  70  !
                          !------------!
                          !   !
                          !        !
                          ! 100  !
                          !------------!
                          !  <UNUSED>  !
                          !   0  !
                          !------------!
                          !   !
                          !        !
                          !  25  !
                          !------------!
                          !  <UNUSED>  !
                          !  15  !
                          !------------!
                          !        !
                          !  81    !
                          !------------!

                             . 50

               -
   ,          .CLOSE.
      .    -
       ,      
   .  . 51     -
      .    -  75  -
   ,  - 10 .




 

                             - 73 -




                         !------------!
                         !        !
                         !  70  !
                         !------------!
                         !  !
                         !        !
                         !  75  !
                         !------------!
                         !  <UNUSED>  !
                         !  25  !
                         !------------!
                         !  !
                         !        !
                         !  10  !
                         !------------!
                         !  <UNUSED>  !
                         !  30  !
                         !------------!
                         !        !
                         !  81    !
                         !------------!

                            . 51

              ,
             -
          .    -
      ,     -
        .       
        .CLOSE.

         DUP    /T    
          -
     .



        11.6.     



               
          FILEX
   ( /U)       COPY/INTERCHANGE.  
     ,      ,
    77 .     26  ()
   ,           
    -8.     128 .

         0        ,  
     .   0  .

          1  4       -
    .    80   .

          1  13    5      
     .   1    5  
     ERMAP.   5     
   .
 

                             - 74 -




         6       -
   .   80 .

         7   .   0  3  
     VOL1  -8.     
        .        
     ,    
    .      ,
    ,    ,    
    . . 7      
    7    .

                                                    TA 7

                
    ---------------------------------------------------------
    ,!               
        !       (     -8)
    ---------------------------------------------------------
          0  ! V
          1  ! O
          2  ! L
          3  ! 1
       4-11  !   
             !    1  6 
             ! (  ),    .
             !    
             ! 
         12  !  .     -
             !    
      13-44  !    
      45-62  !    
             !       
     63-113  !    
    114-115  ! ,   
             ! ,  
             !   (  
             !  1:1)
        116  !    
        117  !   . W  
             ! 

          8  26     .  
     40          .
   T. 8     8  26.














 

                             - 75 -




                                                     8

              8-26    
    ---------------------------------------------------------
     ,!               
         !     (     -8)
    ---------------------------------------------------------
          0   ! H
          1   ! D
          2   ! R
          3   ! 1
          4   ! 
       5-14   ! A 
      15-25   ! 
      26-32   !    
              ! /.   
              !  80,    128
         33   ! 
      34-35   !  ,    
         36   ! 0 ( 360)
      37-40   !  ,    
         41   ! 
      42-43   !   ,
              !     
         44   ! 0 ( 360)
      45-46   !   ,
              !     
         47   ! 
         50   !  
         51   !   
         52   !  
         53   !  ( 100)
              !   
         54   !  :
              !      C       -   . 
              !      L       -   
              !        -  
      55-56   !  
      57-60   !  
      61-62   !  
      63-64   !  
     65-101   ! 
    102-107   !     
              !     ,   
              !   ( 57-64)
        110   !  :
              !     V       -   
              !       -  
        111   ! 
    112-113   !     
              !   
        114   ! 
    115-116   !     
              !   
        117   ! 




 

                             - 76 -




        11.7.   


              
        .      -
           
   .      -
   .

           :

          -       -
                (   
             ,      -
                   );
          -          
               ;
          -       
             ;
          -         
              ,      (
              ).

          -      
       .    -
    -  .   ,      
   ,     . -
             
   ,      .

                  
         .  
   ,          
    . ,  -    -
        ,    
    ,     .    .  52  
    ,     ()    
      .





















 

                             - 77 -




                

          !-----------------!
          !          !
          !            !
          !-----------------!
          !      #1     !
          !-----------------!
          !      #2     !
          !-----------------!    /!-----------------!
          !     <UNUSED>    !   / !          !
          !-----------------!  /  !     !
          !      #3     ! /   !         !
          !-----------------!/    !-----------------!
          !      #4     !     !      #1     !
          !-----------------!\    !-----------------!
          !      #5     ! \   !      #2     !
          !-----------------   \  !-----------------!
          !                 !   \ !     <UNUSED>    !
          !     <UNUSED>    !    \!-----------------!
          !                 !
          !-----------------!

                             . 52

                   
             -.            
   RM/SJ/FB/XM-     
     (UX,  UY,  UZ)       CNT.SAV,      
   TS-     .



        11.7.1.          
                RM/SJ/FB/XM-





        11.7.1.1.    



                  
     UX:, UY:,  UZ:.    
         ,  -
     .        
      ,        SET
   (, SET UX=320).     -
   ,    :

   UX     - ,    
             280 ;

   UY     - 546 ;

   UZ     - 1100 .

 

                             - 78 -




                 -
     (,  UX0:  UX7:).



        11.7.1.2.     
                  



         CONNECT,    CNT.SAV,  -
         
     / '   .  -
   ,         
   UY1:   546    RK0:.

         .LOAD UY
         .CONNECT RK0:DISK,UY1:

         CREATE NEW FILE?Y

             ,     
       ,    
          (  -
   ).        CNT.

         .R CNT
         *RK0:DISK,UY1:

         CREATE NEW FILE?Y

             RK0:     DISK  
   '   UY1:,    -
     UY.       RK0:  
    :   - DISK.SYS,    -  546
   .

           ,       
    .SYS.

         CNT (    CONNECT)  -
        UY   
    ,       . -
          -
   .    4 .

          .INITIALIZE/SEGMENT:N UY1:

          UY1:/INIT ARE YOU SURE?Y

              UY1: 
      "N" .

            
    ,    , ..  -
   .

             RK1:   -
       .
 

                             - 79 -




    .INIT RK1:/VOLUMEID
    RK1:/INIT ARE YOU SURE?Y

    VOL ID? WORK

    OWNER NAME? 

          VIR0   RK1:   '  -
     UX:.     ,  
           
   (   UX0:).

    .LOAD UX

    .CONNECT RK1:VIR0
    DRIVER ? UX:

    CREATE NEW FILE ?Y

    ,      ,  -
       .

    .DIR RK1:/VOL
    7-FEB-84
    VOLUME ID: WORK
    OWNER    : 
    VIR0  .SYS   280 7-FEB-84
    1 FILES, 280 BLOCKS
    4482 FREE BLOCKS

            UX0:,  
    RK1:

    .INIT UX:/VOL

    UX:/INIT ARE YOU SURE?Y

    VOL ID? VIRTUL/X

    OWNER NAME? ##00

    .DIR UX:/VOL
    7-FEB-84
    VOLUME ID: VIRTUL/X
    OWNER    : ##00

    0 FILES, 0 BLOCKS
    266 FREE BLOCKS

           UY:   RK1:.

    .LOAD UY:

    .CONNECT RK1:VIR1,UY1:

    CREATE NEW FILE ?Y

    .INIT UY1:/VOL

 

                             - 80 -




    UY1:/INIT ARE YOU SURE?Y

    VOL ID? VIRTUAL/Y

    OWNER NAME? ##01

    .DIR UX:/SUM
    7-FEB-84

        3 FILES IN SEGMENT 1

        4 AVAILABLE SEGMENTS, 1 IN USE

    3 FILES, 3 BLOCKS
    263 FREE BLOCKS

    .DIR UY1:/SUM
    7-FEB-84

        0 FILES IN SEGMENT 1

        4 AVAILABLE SEGMENTS, 1 IN USE

    0 FILES, 0 BLOCKS
    532 FREE BLOCKS

          ,         
   SQUEEZE (   )    -
        '  -
      .    
           
    . ,  VIR0   
    '   UX:.   
        '   -
    UX3:.

    .BOOT SY:
    RAFOS+/XM (S) V2.1/4.00
    .
    .
    .
    .DIR RK1:/VOL
    7-FEB-84
    VOLUME ID: WORK
    OWNER    : 
    VIR0  .SYS   280 7-FEB-84     VIR1  .SYS   546 7-FEB-84
    2 FILES, 826 BLOCKS
    3936 FREE BLOCKS

    .LOAD UX,UY

    .CONNECT RK1:VIR1,UY5:

    .CONNECT RK1:VIR0,UX3:

                -
    :

        1)      -
 

                             - 81 -




    .      ,      
      .  ,      
   '  VIR0   UX:

        .CONNECT
        VOLUME ? RK1:VIR0
        DRIVER ? UX:
        ?CNT-F-LOAD DRIVER

      ,    -
       ;

        2)        ,
   :

          -  ' UX:    -
                    
            UX1:

              .DIR UX1:
              ?DIR-F-ERROR READING DIRECTORY

          -      -
                     
              UY:  UX:

              .COPY UX: UY:
              FILES COPIED:

              ?MON-F-DIRECTORY I/O ERROR
              ;   

        3)        '
     .      '  
          -
       ' .

        .LOAD UX,UY

        .CONNECT
        VOLUME ? RK1:VIR0,UY5:
        ?CNT-F-ILLEGAL FILE LENGTH FOR DRIVER
        ;    

    ,       -
    '  .  VIR0  -
    ' UX:     280 .  -
   ,     (  VIR0)  
      UX.



        11.7.2.          
                TS-



            : 
    CREATE      ,  
 

                             - 82 -




      /ALL:N.    
     CONNECT  '   
   .     INITIALIZE  
     .

        ,        
     1000    RK0:  '  -
     F:.

         .CREATE RK0:DISK/ALL:1000
         .CONNECT RK0:DISK F:


         ,  
      CONNECT  ASSIGN.

                 
         -
    .          
    :

          .INITIALIZE/SEGMENT:N F:

          F:/INIT ARE YOU SURE?Y

         F:   -
     N .


        .  ,     
    SQUEEZE (   )  -
             '
      .


























 

                             - 83 -




       12.    




               -
          -
   .     ,   ,  
       ( ).   -
         ,    
   .        -
   .



        12.1.     



                -
    .

                   
   ,     .    
    ,   .  ,
          .  -
               
          .  
            
     .

         :

     (VOL1)
          -          ;
                     EOV,  
                 ;

     (*)
          -      ; 
                 ;

      (HDR1)
          -       ,
               ;    0;

      (EOF1)
          -    , 
              HDR1,      ;  
               ;

    
          -  ,      
            ;         
                  -
            .

                 
   ,        
 

                             - 84 -




   .SPFUN  ,   .

          DIR, DUP, PIP  ..  
        , ..    
   512 .

        ,    ,  :

       HDR1 *  * EOF1 *

        ,   ,  :

       VOL1 HDR1 *  * EOF1 * * *

        ,   ,  :

       VOL1 HDR1 *  * EOF1 * HDR1 *  * EOF1 * * *

         ,   ,  
    :

       VOL1 HDR1 * * EOF1 * * *

              :

       VOL1 BOOT  HDR1 *  * EOF1 * * *

                     
   MBOOT.BOT ( )     
        .  
   ,        -
    (BOOT),  MSBOOT.BOT,      
      .      
     (512 ).

               -
    80  (  512 ),      
          .  ,
      ,   . 9.




















 

                             - 85 -




                                                  9

                   (VOL1)

   -------------------------------------------------------
             !        ! !       
      ! !, ! (  
         !        ! !        -7)
   -------------------------------------------------------
             !- !  3   !
             ! !      !
     1 -  3  ! (ID)   !      !           VOL
             !   !      !
   ----------!--------!------!----------------------------
          4  !   !  1   !            1
             !   !      !
   ----------!--------!------!----------------------------
             !        !      ! RAFOS,   
     5 - 10  ! ID !  6   !   ( ),
             !        !      !  ,  ID 
   ----------!--------!------!----------------------------
         11  !        !  1   !          
   ----------!--------!------!----------------------------
             !      !      !
    12 - 37  ! -! 26   !          
             !  !      !
   ----------!--------!------!----------------------------
    38 - 50  !ID -! 13   !  38  40  ID  D&B;
             !!      !  41  50  ID 
             !        !      !  
   ----------!--------!------!----------------------------
             !-!      !
         51  !    !  1   !            1
             !  !      !
             ! !      !
   ----------!--------!------!----------------------------
             !      !      !
    52 - 79  !- ! 28   !          
             !  !      !
   ----------!--------!------!----------------------------
             !-!      !
         80  !    !  1   !            3
             !  !      !
             !   !      !

        ,    ,  
   . 10.












 

                             - 86 -




                                                  10

                    (HDR1)

   -------------------------------------------------------
             !         ! !       
      !  !, !(  
         !         ! !        -7)
   -------------------------------------------------------
     1 -  3  !ID  !   3  !          HDR
   ----------!---------!------!---------------------------
          4  !    !   1  !           1
             !    !      !
   ----------!---------!------!---------------------------
     5 - 21  !ID  !  17  !   ,  (".")
             !         !      !          
   ----------!---------!------!---------------------------
    22 - 27  !ID !   6  ! RAFOS,   
             !    !      !         
   ----------!---------!------!---------------------------
             !    !      !
    28 - 31  !   !   4  !         0001
             !    !      ! (  )
   ----------!---------!------!---------------------------
             !- !      !     
    32 - 35  ! !   4  !  0001;  
             !    !      !     1;
             !         !      !    
             !         !      !     0000
             !         !      ! (  )
   ----------!---------!------!---------------------------
             !    !      !         0001
    36 - 39  !!   4  ! (  )
   ----------!---------!------!---------------------------
             !   !      !          00
    40 - 41  !!   2  ! (  )
   ----------!---------!------!---------------------------
             !     !      ! ,   -
    42 - 47  ! !   6  !   ( * 1000 + )
   ----------!---------!------!---------------------------
             !     !      ! ,   
    48 - 53  !!   6  !          
   ----------!---------!------!---------------------------
         54  !    !   1  !         
             !  !      !
   ----------!---------!------!---------------------------
    55 - 60  !  !   6  !         000000
             !   !      ! (  )
   ----------!---------!------!---------------------------
    61 - 73  !      !  13  !        INERAFOS
             !  !      !
   ----------!---------!------!---------------------------
             !       !      !
    74 - 80  ! - !   7  !         
             !   !      !


        .   (DAT)  
   :
 

                             - 87 -




             DAT =  * 1000 +                    (4.4)

   

         - ;

         -     .

        ,  5.05.83.    

       83 * 1000 + (31 + 28 + 31 + 30 + 5) = 83125

     ,     
   (,    ,     
   ).

           (EOF1)   ,     
      (HDR1),        ,
      . 11.

                                                  11

                 (EOF1)
   -------------------------------------------------------
             !        ! !       
      ! !, ! (  
         !        ! !        -7)
   -------------------------------------------------------
     1 -  3  !ID !  3   !          EOF
   ----------!--------!------!----------------------------
             !        !      !  ,
             !        !      !   (
    55 - 60  ! !  6   !   
             !  !      !.SPFUN);   
             !        !      ! .SPFUN 
             !        !      ! ;  .SPFUN 
             !        !      !   
             !        !      !256 () , 
             !        !      !  -
             !        !      !  



        12.2.   



            ,   
     128 .     
     32 .

         :

     
          -        ;

    
          - ,       
             ;
 

                             - 88 -




    
          - ,    ;

     
          - ,       ,  
               ;

    
          - ,     ;

    
          - ,      
            ;

     
          - ,           ;
                    
            (  ).

                   ,
     . 53.

                     !-------------!
                     !    !
                     !      !
                     !        !
                     !-------------!
                     !  !
                     !   !
                     !-------------!
                     !   !
                     !-------------!
                     !   !
                     !   !
                     !      .      !
                     !      .      !
                     !      .      !
                     \/\/\/\/\/\/\/

                         . 53

                -
      (. 54).
















 

                             - 89 -




                     !-------------!
                     !    !
                     !      !
                     !        !
                     !-------------!
                     !  !
                     !   !
                     !-------------!
                     !   !
                     !-------------!
                     !   !
                     !   !
                     !-------------!
                     !   !
                     !-------------!
                     !   !
                     !   !
                     !-------------!
                     .             .
                     .             .
                     .             .
                     !-------------!
                     !   !
                     !-------------!
                     !   !
                     !        !
                     !-------------!

                         . 54

           ,     -
   ,     (. . 54).  ,  
       ,        
       (. 55).

























 

                             - 90 -




                      !-------------!
                      .             .
                      .             .
                      .             .
                      !-------------!
                      !   !
                      !   !
                      !-------------!
                      !   !
                      !-------------!
                      !   !
                      !   !
                      !-------------!
                      !     !
                      !   !
                      !         !
                      !-------------!
                      !       !
                      !   !
                      !-------------!

                         . 55


        .           
      ,       
            -
    .































 

                             - 91 -




             . 12.

                                           12

                  
   --------------------------------------------------
             !        ! !     
      ! !, ! (  -
         !        ! !     -7)
   --------------------------------------------------
     1 -  9  !ID !   9  !        
   ----------!--------!------!-----------------------
         10  !     !   1  !          0
             !  !      !
   ----------!--------!------!-----------------------
             !   !      !
    11 - 12  !   !   2  !         200
             !  !      !    ()
   ----------!--------!------!-----------------------
             !        !      !0    
             !-!      !    1- 
         13  !     !   1  !(  
             !   !      !);  -
             !   !      !  
             !        !      !         1
   ----------!--------!------!-----------------------
         14  ! !   1  !          1
   ----------!--------!------!-----------------------
    15 - 20  !    !   6  !  0  , 
             !!      !    
   ----------!--------!------!-----------------------
    21 - 22  !        !   2  !          0
   ----------!--------!------!-----------------------
         23  ! !   1  !    0 -  
             !  !      !
   ----------!--------!------!-----------------------
             !      !      !
    24 - 29  !- !   6  !    
             !  !      !
   ----------!--------!------!-----------------------
             !      !      !
    30 - 32  !- !   3  !  
             !  !      !

           ,     
   -7   :

          -  (01 - 31);
          -  (01 - 12);
          -    -     
             1972.

           ( 11-12)    -
   .       (0), 
    -    (200).










